home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Franz PD / Franz PD Disk #093 (1990-10)(Amiga User Group Deutschland e.V.).zip / Franz PD Disk #093 (1990-10)(Amiga User Group Deutschland e.V.).adf / Redcode / Chang < prev    next >
Text File  |  1990-09-11  |  288b  |  15 lines

  1. ; Chang
  2. ; -----
  3.  
  4. trap            MOV #0, $7999
  5. maketrap        JMP $trap    
  6. ptr             DAT 9
  7. start           SPL $maketrap
  8.                 SPL $lnge 
  9.                 SUB #16, ptr 
  10.                 MOV #0, @ptr 
  11.                 JMP start
  12. lnge            SPL 2
  13.                 JMP -1
  14.  
  15.